(vc-arch-command): Also try "baz" and "bzr".

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 086da569412861dbbbc04391dfe3268cfcf15bcd..db8fca98edc147de0e9b74881259e7e59126bf9b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-06-12  Sam Steingold  <sds@gnu.org>
+
+       * vc-arch.el (vc-arch-command): Also try "baz" and "bzr".
+
 2007-06-12  Juanma Barranquero  <lekktu@gmail.com>
 
        * desktop.el (desktop-load-locked-desktop): New option.

diff --git a/lisp/vc-arch.el b/lisp/vc-arch.el
index 488f9108d367c5571d7f4a9ced3312732a70713b..e3dc76b090ad8ae0121f6bd4ce5b1ce47e40df09 100644 (file)
--- a/lisp/vc-arch.el
+++ b/lisp/vc-arch.el
@@ -62,7 +62,7 @@
 ;;;
 
 (defvar vc-arch-command
-  (let ((candidates '("tla")))
+  (let ((candidates '("tla" "baz" "bzr")))
     (while (and candidates (not (executable-find (car candidates))))
       (setq candidates (cdr candidates)))
     (or (car candidates) "tla")))